home *** CD-ROM | disk | FTP | other *** search
/ Programmer Power Tools / Programmer Power Tools.iso / c / string.arc / MEMCHR.C < prev    next >
Encoding:
C/C++ Source or Header  |  1984-12-31  |  1.0 KB  |  44 lines
  1. /*  File   : memchr.c
  2.     Author : Richard A. O'Keefe.
  3.     Updated: 25 May 1984
  4.     Defines: memchr()
  5.  
  6.     memchr(src, chr, len)
  7.     searches the memory area pointed to by src extending for len bytes,
  8.     looking for an occurrence of the byte value chr.  It returns NullS
  9.     if there is no such occurrence.  Otherwise it returns a pointer to
  10.     the FIRST such occurrence.
  11.  
  12.     See the "Character Comparison" section in the READ-ME file.
  13. */
  14.  
  15. #include "strings.h"
  16.  
  17. #if    VaxAsm
  18.  
  19. char *memchr(src, chr, len)
  20.     char *src;
  21.     char chr;
  22.     int len;
  23.     {
  24.     asm("locc 8(ap),12(ap),*4(ap)");
  25.     asm("bneq L1");
  26.     asm("movl r1,r0");
  27.     asm("L1: ret");
  28.     }
  29.  
  30. #else  ~VaxAsm
  31.  
  32. char *memchr(src, chr, len)
  33.     register char *src;
  34.     register int chr;        /* should be char */
  35.     register int len;
  36.     {
  37.     while (--len >= 0)
  38.         if (*src++ == chr) return src-1;
  39.     return NullS;
  40.     }
  41.  
  42. #endif    VaxAsm
  43.